home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #5 / Amiga Plus CD - 2000 - No. 5.iso / Tools / Misc / FLM / otherfiles / english / ARexx / ww_look.rexx < prev    next >
OS/2 REXX Batch file  |  2000-01-01  |  872b  |  28 lines
  1. /* This script sends "a word" to FLM:
  2.    As a result FLM opens the FLM ARexx window
  3.  
  4.    If you link this script with a menu or toolbar, in some ways something
  5.    doesn't yet work.
  6.    To test it, I had the version 4 SE of Wordworth. Maybe my script works
  7.    with the full version of Wordworth. Should you have an idea how
  8.    improving the FLM linking with Wordworth, I would be grateful if you
  9.    send it to me.
  10. */
  11.  
  12. /* Here indicate, please, the FLM path and program name */
  13. initiation=run "dh0:FLM/FLM"
  14.  
  15. Options RESULTS /* To receive a return result too */
  16.  
  17. IF ~show('P','FLM') THEN DO
  18.  /* if FLM is not yet running */
  19.  ADDRESS COMMAND initiation
  20.  /* Wait until FLM is started... */
  21.  ADDRESS COMMAND "SYS:RexxC/WaitForPort FLM"
  22. END
  23.  
  24. RESULT='' /* Unfortunately I've found no ARexx command that returns the
  25.              current selected word */
  26.  
  27. Address FLM LOOKWORD RESULT
  28.